home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-02 / objovr.zip / USEOBJ.PAS < prev   
Pascal/Delphi Source File  |  1993-01-04  |  185b  |  15 lines
  1. {$F+}
  2.  
  3. program UseOBJ;
  4.  
  5. uses
  6.   InitOver, OBJTypes, LookOBJ;
  7.  
  8. { $O LookOBJ }
  9.  
  10. var
  11.   I : integer;
  12. begin
  13.   for I := 1 to Max do
  14.     write ( OBJitized ( I ) : 16 : 10 );
  15. end.